Public Class clsLugares
#Region "Propiedades"
    Private propLugar As String
    Private propDireccion As String
    Private propTelefono As String
    Private propEmail As String
    Private propMapa As String
    Private propNombreLugar As String
#End Region

#Region "Metodos de acceso a las propiedades"
    Public Property NombreLugar() As String
        Get
            Return Me.propNombreLugar
        End Get
        Set(ByVal value As String)
            Me.propNombreLugar = value
        End Set
    End Property

    Public Property Lugar() As String
        Get
            Return Me.propLugar
        End Get
        Set(ByVal value As String)
            Me.propLugar = value
        End Set
    End Property

    Public Property Direccion() As String
        Get
            Return Me.propDireccion
        End Get
        Set(ByVal value As String)
            Me.propDireccion = value
        End Set
    End Property

    Public Property Telefono() As String
        Get
            Return Me.propTelefono
        End Get
        Set(ByVal value As String)
            Me.propTelefono = value
        End Set
    End Property

    Public Property Email() As String
        Get
            Return Me.propEmail
        End Get
        Set(ByVal value As String)
            Me.propEmail = value
        End Set
    End Property

    Public Property Mapa() As String
        Get
            Return Me.propMapa
        End Get
        Set(ByVal value As String)
            Me.propMapa = value
        End Set
    End Property
#End Region

#Region "Funciones y Procedimientos Publicos"
    ''' <summary>
    ''' Destruye el Objeto
    ''' </summary>
    ''' <remarks></remarks>
    Public Sub Dispose()
        Try
            GC.SuppressFinalize(Me)
        Catch ex As Exception
        End Try
    End Sub
#End Region
End Class
